program CreationACoverForPoints;

{$APPTYPE CONSOLE}

uses
  SysUtils;

type
ArrInt = array of integer;
fin: textFile;
mass: array of ArrInt;

var
x1, y1, x2, y2, x3, y3, x4, y4, i: integer;
max: real;

begin
  assignFile (fin, 'input.txt');
  reset (fin);
  readln (n, fin);
  setlength (mass, n);
  for i:=0 to n-1 do
    setlength(mass[i], 2);
  for i:=0 to n-1 do
  begin
    read(mass[i][0]);
    readln(mass[i][1])
  end;
  x1:=mass[0][0];
  y1:=mass[0][1];
  x2:=mass[0][0];
  y2:=mass[0][1];
  x3:=mass[0][0];
  y3:=mass[0][1];
  x4:=mass[0][0];
  y4:=mass[0][1];
  for i:=1 to n-1 do
  begin
    if (mass[i][0]<x1) then
    begin
      x1:=mass[i][0];
      y1:=mass[i][1]
    end;
    if (mass[i][0]>x3) then
    begin
      x3:=mass[i][0];
      y3:=mass[i][1]
    end;
    if (mass[i][1]>y2) then
    begin
      x2:=mass[i][0];
      y2:=mass[i][1]
    end;
    if (mass[i][1]<y4) then
    begin
      x4:=mass[i][0];
      y4:=mass[i][1]
    end;
  end;
  writeln(x1, '  ', y1);
  max:=0;
  while (x1<>x2) and (y1<>y2) do
    begin
      for i:=0 to n-1 do
      begin
        if (mass[i][0]>=x1) and (mass[i][1]>=y1) then
        begin
          if ((mass[i][0]-x1)/(sqrt((mass[i][0]-x1)*(mass[i][0]-x1)+(mass[i][1]-y1)*(mass[i][1]-y1)))>max) then
            max:=(mass[i][0]-x1)/(sqrt((mass[i][0]-x1)*(mass[i][0]-x1)+(mass[i][1]-y1)*(mass[i][1]-y1)));
        end;
      end;
    end;
end.
